object frFieldsForm: TfrFieldsForm Left = 193 Top = 109 BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp] BorderStyle = bsDialog Caption = 'DB fields' ClientHeight = 193 ClientWidth = 410 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter OnCreate = FormCreate OnHide = FormHide OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 16 Top = 168 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object Image2: TImage Left = 48 Top = 168 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object Image3: TImage Left = 80 Top = 168 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object Image4: TImage Left = 112 Top = 168 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object FieldsLB: TListBox Left = 248 Top = 4 Width = 157 Height = 149 HelpContext = 23 DragMode = dmAutomatic ItemHeight = 16 Style = lbOwnerDrawFixed TabOrder = 0 OnDblClick = FieldsLBDblClick OnDrawItem = DatasetsLBDrawItem end object DatasetsLB: TListBox Left = 4 Top = 4 Width = 237 Height = 149 HelpContext = 10 ItemHeight = 16 Style = lbOwnerDrawFixed TabOrder = 1 OnClick = DatasetsLBClick OnDrawItem = DatasetsLBDrawItem end object Button1: TButton Left = 250 Top = 164 Width = 75 Height = 25 HelpContext = 40 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 2 end object Button2: TButton Left = 330 Top = 164 Width = 75 Height = 25 HelpContext = 50 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end end